function [index] = MakeIndex(a);

for i=1:size(a,2)
    index(1,i) = i;
end
